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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS. RESERVED. 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
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++ 
Facility: RMS 


Abstract: 


This module communicates with the file access listener at the remote 
node to establish a record stream for the specified file. 


Environment: VAX/VMS, executive mode 
Author: James A. Krycka, Creation Date: 09-DEC-1977 
Modified By: 


v03-004 JEJ0009 J E Johnson 16-Mar-1984 
Increase the we SF of checking on the interaction of the 
$Q0 bit and the various RAC options. 


v03-003 gt 10006 J E Johnson 01-Mar-1984 
isable file transfer mode for access of image indirect 
tere permanent files to permit proper network action 
esrege yer veue image invocations, as in the handling of 


V03-002 JAK0124 J A Krycka 06-SEP-1983 
Make corres oo hee Ol source code change for VMS V3.5 patch in 
support of VAXELA 
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-1983 
peeve check for a MBX inte in NTSCHK. $Q0 to permit use of 
P file transfer mode during access to the null device or to 
ghd on the remote node. 
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STREAM 


-SBTTL DECLARATIONS 


: Include Files: 


Macros: 


None 

; Equated Symbols: 

ASSUME DAPS$Q_DCODE_FLG EQ 0 
ASSUME NWA$Q"FLG EO 0 
PARTNER = DAP$W_PARTNER * 8 


Own Storage: 
None 
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DAP message header 

DAP Configuration message 
DAP Control message 

IFAB symbols 

IRAB symbols 

Network Work Area symbols 
Record Access Block symbols 
RMS error code symbols 
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~SBTTL NTSCONNECT = PERFORM NETWORK CONNECT FUNCTION 


2x 
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2m 
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; : NTSCONNECT = engages in a DAP dialogue with the remote FAL to establish a 
: record stream for the specified file. 


Calling Sequence: 

BSBW NTSCONNECT 
Input Parameters: 

R8 RAB address 


R9 
R10 IFAB address 
R11 Impure Area address 


Implicit Inputs: 
DAPS$Q_SYSCAP bits ee SEQRAC, SEQFIL, SWMODE, 
RANKEY oe RANVBN 


ANRR 
DAP$V_GEQ_V52, DAPSV Gea. 54, DAP$v_GEQ_60 
DAPSV =p AXONS. DAPS$V_VAXECAN 


RABS$B_RAC 
RABSL_ROP bits 
Output Parameters: 
RO Status code (RMS) 
R1i-R7 Destroyed 
AP Destroyed 


Implicit Outputs: 
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P_CONN 
be F TM_EOF 
M-IN 
NWASV_RAC_FL 
Completion Codes: 


IT 
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Standard RMS completion codes 
Side Effects: 
None 
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NTSCONNECT: : Entry point 
$TSTPT NTCONN : 
MOVL IFBSL_NWA_PTR(R10),R7 ; Get address of NWA (and DAP) 
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NTOCONN NETWORK CONNECT STREAM 1 3:51:33 VAX/VMS Macro v04-00 Page 
v04-000 NTSCONNECT = PERFORM NETWORK CONNECT FUN gx $EF =}982 3:30:33 RMS.SRCINTOCONN.MAR; 1 . 
E1 900A 157 BBC #RABSV_BIO,- ; Set internal block 1/0 flag if 
10 04 3 it 138 RAB abe cka), SEND_CTL ; ersnee supports BRO and eee set 
0p. 22 aa © Oot 180 med it Ae SEND.CTL : de Laptae bios 326 ands au hisnaat 
: ec arin oc mode on connec 
06 A? 630~—s«#B 14 161 BITW #<<1a2DAPS$V_ VASURSOPAR? NER> . 
1 196 <13ep DAPS$V— VAXELAN-PARTNERD> ~ 
1 16 0>, gBApsu PARTNER(R7) Branch if partner is neither VAX/VMS 
05 13 001 164 BEQL te + nor VAXELAN 
OO1A 165 SSETBIT Pir esy B10, 1FBSB_FAC(R105 
OO1F 196 
OO1F 167 ;+ 
Bate 198 ; Build and send DAP Control message to partner. 
OO1F 15 
OO1F 171 SEND_CTL : 
OO1F \7e SseTBIT #NWASV “hast acs’ (R7) ; Declare this last message to block 
50 04 p0 0023 (17 #DAPSK~ 6,RO ; Get message type value 
FFD7" 30 0026 174 BSBu NTSBUI Bt vt ; Construct message header 
85 02 90 0029 175 MOVB WDAPSK CONNECT (R5)+ ; Store CTLFUNC field 
85 08 90 O002C 176 MOVB  #DAPSM~ROP, (R55+ ; Store CTLMENU field 
05 €0 002F 177 BBS #1FB$V_BIO,- : Branch if block 1/0 specified 
OF 22 AA 0031 178 IFB$B_FAC(R10 : 
20 O00C6 C7 91 0034 £179 CMPB NWA$B ~ORGERY).  PhUAsK ~1DX; Branch if not IDX organization 
08 12 0039 #£«180 BNEQ 0 3 
FF AS 04 88 OO3P 181 BISB2 #DAPSM_KRF,-1(R5) : Add KRF field to menu 
85 35 AB 99 O03F 186 MOVB sy a B RRF (RB), (R5)+ ; Store key of of rererence field 
OOFO 30 0043 183 10$ BSBW NTSMAP_ a : Store RO eld 
08 €1 0046 184 BBC aR ABSV- ; Branch if position to end-of-file 
05 04 A8 0048 185 RABSL Ro (RB). 20$ ; was not specified 
OD €1 0048 186 BBC AP$7_APPEND,- ; Branch if partner does not support 
2E 28 A? 004D 187 DAP SO SYSCAP(R7) , ERRSUP ; file appen 
FFAD' 30 b030 188 20$: BSBW NTSB UTLD_TAIL : Finish ort ging message 
FFAA' 30 005 189 BSBW NISTRANSALT : Send Control message to FAL 
24 50 €9 0056 £190 BLBC RO,EXIT : Branch on failure 
0059 +=191 
0059 136 3¢ 
0059 193 ; Receive DAP Acknowledge message from partner. 
0059 =: 194 :- 
0059 =195 
0059 196 RECV_ACK 
0059 197 SSETBIT #DAPSK_ACK_MSG,DAPS$L _MSG_ MASK (R7) 
QOSE 198 : Expect response of Acknowledge message 
FFOF* 30 OOSE 199 BSBW NTSRECEIVE 3; Get reply from FAL 
19 50 +€9 Boe, 69 BLBC RO,EXIT : Branch on failure 
064 1 
0064 8 3+ x aes : 
ve 03 ; Perform initialization functions. 
oe 308 
boed Bg SSETBIT #I1RBS$V_DAP_CONN, (R9) ; Yes, FAL has com Letee connect 
Bpe8 4 SSETBIT #NWASV_RAC_FLG, (R7) 3 SSTSCHK RA time-t flag for 
13. 10 006C 09 BSBB NTSCHK_SQO 3; Reverse sense of SQ0 bit as required 
08 6A 2D €1 33 10 BBC #1FB$V~SQ0, (R10) 10s ; Branch if not sequential-only 
0 11 SSETBIT MNWASVIFTM_INIT,(R7)  : Set SEQ file transfer one-shot flag 
07% 1 SCLRBIT #NWASVF TMEOF , (R7) : Initialize EOF flag 
7A 15 10$: RMSSUC ; Return success 
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NETWORK CONNECT STREAM 15-SEP-1984 23:51:33 VAX/VMS Macro v04-00 Pa | 
NTSCONNECT = PERFORM NETWORK CONNECT FUN ram sat 9 93:39:37 YAMS SRCINTOCONN MAR: 1 - (%) 
93 B87D ie EXIT: RSB 3 Exit with RMS code in RO 

FF7F* 1 7E 15 ERRSUP: BRW NTSRMT_ROP ; Branch aid 


NTOCONN NETWORK CONNECT STREAM 15-SEP-1984 23:51:33 VAX/VMS Macro v04-00 Page 
v04-000 NT$CHK_SQO SEE 982 16:20:21 CANS SRCINTOCONN-MARS 1 - 
poe) 17 -SBTTL NT$CHK_SQ0 
081 18 
ppg] 17 34? i 2 
081 20 ; NTSCHK_SQO will override the user's setting of the SQO bit in the FOP field 
+ 21 ; if any of the following conditions are met: 
0081 58 ; (1) IFB$V_SQ0 is set a tore ine DAP file transfer mode) if RAC=SEQ, record 
0081 24 ; access is requested and the remote node does not support DAP record 
0081 a7 2 access mode. This is useful for communicating with many non-VAX nodes 
0081 26 ; through higher-level language programs that sequentially access remote 
poe] sf : files. 
0081 295 : (2) IFBS$V_SQO is set tag DAP file transfer mode) if the remote node 
0081 230; does not support access by virtual block number (VBN) and the requested 
poet $3, 3 access is block 1/0 
0081 533 ; (3) IFBSV_SQ0 is cleared (forcing DAP record access mode) if remote device 
0081 234; is a terminal, the requested access is record access and the remote 
49 235 ; node supports DAP record access mode. This allows prograne to perform 
081 236 ; bi-directional 1/0 to VMS terminals with SQO0 set. This is important to 
0081 237 ; higher-level languages such as FORTRAN, whose run-time iibrary sets 
49 $36 ; $Q0 if RAC=SEQ. 
0081 240 ; (4) IFB$V_SQ0 is cleared in either record access or block mode access if 
0081 241 ; the accessed file is an image indirect PPF, thus allowing successful 
0081 242 ; completion of control operations, such as $DISPLAY. 
0081 243 ;-- , 
0081 244 
0081 245 NTS$CHK_SQO:: ; Entry point ais 
05 £0 0081 246 BBS #1FBS$V_BIO,- ; Branch if block I/0 specified 
10 22 AA 0083 247 IFB$B_FAC(R10) ,20$ 
0086 248 
0086 249 ; f : he ; 
Oobe $24 ; Enable DAP file transfer mode for record 1/0 if conditions in (1) are met. 
0086 252 
21 £€0 0086 253 BBS #DAPS$V_SEQRAC,- ; Branch if remote node supports 
15 28 A7 0088 254 DAP$Q_SYSCAP(R7) ,30$ : _DAP record access mode 
00 16 AS 91 QOO8B 255 CMPB RABS$B_RAC(R8) ,ARABSC_SEQ; Branch if access mode is not 
04 12 QO8F 256 BNEQ 10 ; _sequential oui 
0091 257 SSETBIT #IFBS$V_SQ0, (R10) ; Internally set SQ0, overriding user 
05 0095 258 10$: RSB 
0096 259 
096 260 ; . ae 
45 se ; Enable DAP file transfer mode for block I/0 if conditions in (2) are met. 
0096 68 . 
07 £0 0096 264 20$: BBS #DAP$V_RANVBN,- ; Branch if remote node supports random 
09 28 A7 0098 265 DAP$Q_SYSCAP(R7) ,40$ ; access by VBN ay 
009B 266 $SETBIT #IFB$9_SQ0, (R10) ; Internally set SQ0, overriding user 
05 QO9F 267 RSB 
QOAO 268 
QOAO 269; | é ; ee : 
Bp Ae a ; Disable DAP file transfer mode if conditions in (3) or (4) are met. 
O0A  * 
04 67 +10 €0 SOA0 5g 30$: BBS #NWASV_DEVTRM,(R7),50$ ; Leave the SQ0 bit alone if we are 
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5 203: 
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~(R10),60$ ; not a terminal or an image PPF. 
3; Internally clear SQ0, overriding user 
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» SBTTL 


NTSCHK -RAC compares the current RMS RAC 
: to check for a switch in access mode. 


NTSCHK_RAC:: 
BBSC 


CMPB 


+ 
10.0 
000 
ae 
=r 
Ow 
mow 
o— 
row 
WN 
n< 


DAPSa “SYSCAPCAT), 40$ 
AB$B~RAC (RB) 

NWASB RMS “RAC(R?) 

GET RAC 


RO, 308 
R1,NWASB_DAP_RAC(R7) 
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value with the previous RAC value used 


; Entry point 
#NWASV rat pe haa ,10$ ; 


NWASB_RMS_RAC(R7) 
20$ 


Check and clear first-time-thru flag 


; Branch if no switch in access mode 


; Branch if ee  & paeeen mode 
: y F 


is not su eer sed 


; Save user Rac value 
; Get DAP RAC value 

; Branch on error 

; Save DAP RAC value 
; Return success 

; Exit 


; Declare error and exit 


NTOCONN NETWORK CONNECT STREAM 15-SEP-19 3:51:33 VAX/VMS Macro V04-00 Page 
V04=000 NTSCHK RAC a7 Seen 19be 16:20:27 LAMS ERCIATOCONN Maks 1 . 
Hite 1 :++ 
02 gi GET_RAC returns the DAP RAC value in R1 if supported by the remote FAL. 
00D : The DAP value is determined by the combination of IFB$V_B10, IFB$v_SQ0, 
0005 4; and RABSB_RAC. 
00D5 05; 
0005 86 
0005 07 GET_RAC: 
00D5 08 RMSSUC 3; Anticipate success 
17 6A 2D €1 00D8 09 BBC #1FB$V_SQ0, (R10), 20$ ; Branch if not in file xfer mode 
00 91 OO0DC 10 CMPB #RABSC” SEQ ; Sequential access is the only one 
1E A8& 00D 11 RABSB_ RAC (RB) ; allowed in FIM. 
4E 12 BRE 1g BNEQ 90$ 3; If not sequential return an error 
51 05 9A OOE 14 MOVZBL #DAPSK_BLK_FILE,R1 ; B1O=1; S$Q0=1; RAC=SEQ (assumed) 
05 €0 O0E5 15 BBS #1FBS$V-BIO, ; Determine if record or block seql. 
03 22 AA O0E7 316 1FBSB,FAC(R10), 108 
51. 03 9A OOEA 317 MOVZBL #DAPSR_SEQ FILE,R1 : B10=0; $Q0=1; RAC=SEQ 
05 €1 OOED 318 10$: BBC #DAPSV_SEQFIL ; Branch if not supported ge 
38 28 A7 4 319 DAPS$Q_ SYSCAPCR7), 80$ ; Note: there is no BLKFIL bit Sehtned 
05 oors $59 RSB : (i.e., block 1/0 file xfer mode) 
05 €0 OOF3 356 208: BBS #1FBS$V_BI10,- ; Branch if block I/0 specified 
2C 22 AA OOF5 32 1FB$B_FAC(R10) ,60$ 
OOF8 324 $CASEB SELECTOR: R=RAB$B_ "RAC(RB)= ; Access mode: 
OOF8 325 DISPL= 3 
OOF 8 $58 30$- 3 Sequential access 
OOF 8 27 40$- : Random access by key value 
ite $56 50$- ; Random access by R 
51 00 9A 01035 350 30$: MOVZBL #DAPSK _SEQ_ACC,R1 ; B10=0; $Q0=0; RAC=SEQ 
21 €1 0106 31 BBC #DAP$V_SEQRAC,- : Branch if not supported by FAL 
22 28 A? 0108 336 DAP$Q _SYSCAP(R7), 80$ 
05 0108 33 RSB 
51 01 9A 010C 334 40$: MOVZBL M#DAPSK_KEY ACC,R1 ; B10=0; $Q0=0; nce ri 
08 €1 O10F 335 BBC #DAPS$V~RANREY,- : Branch if not uppor ted by FAL 
01 28 A7 a oti) 338 an DAP$Q VeVSCAPCR7) , 45$ 3; (random aceeee | y key for IDX org) 
06 €1 0115 338 45$: BBC #DAP$V_RANRRN : Branch if not Supper ted, by F 
13 28 A7 - mie tip ee DAP$Q “SYSCAP(R7), 80$ 3; (random access by RRN for REL org) 
51 02 9A 0118 341 50$: MOVZBL #DAPSK_RFA_ACC,R1 ; BI1O=0; $Q0=0; RAC=RFA 
OA €1 OJ1TE 206 BBC #DAPSV_RANRFA 5 Branch if not supported by FAL 
OA 28 A7 0120 4 DAP$Q VeVSCAPCR7), 80$ 
05 Bis? 44 RSB 
51 04 9A 124 45 60S: MOVZBL #DAP$K_BLK VEN. R1 ; BlO=1; S$Q0=0; RAC=xxx 
07 €1 0127 346 BBC #DAPS$V~RANUBN, : Branch if not supported by FAL 
01 28 A7 0129 347 DAP$Q VeYSCAPCR7), 80$ 
05 Bisc rt: RSB 
FEDO* 31 0190 50 80$: BRw NTSRMT_RAC ; Declare error and exit 
0130 51 90$: RMSERR FIM : Declare a File Transfer Mode error. 
05 0135 52 RSB 
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NTOCONN oe OO SOUNECT STREAM 15-SEP-1984 23:51:33 VAX/VMS Macro v04-00 Page 
v04-000 NTSMA ae e ET obe 18:30:31 RMS.SRCIN Toc CONN.MAR; 1 . 
136 54 -SBTTL NTSMAP_ROP 
1 6 55 
136 a : p++ 
0136 5 Encode the ROP field. ; 
0136 58 :-- 
0136 59 
4 6 60 NTSMAP_ROP: 3; Entr goter 
51 04 AB DO 0136361 MOVL  RABSL_ROP(RB),R1 : Get ROP bits 
52 D4 QI3A $¢ CLRL R2 ; Clear resultant ROP bits 
013C 6 
013C 64 ; 
Bist 65 ; The following DAP bits are defined in the DAP V4.1 specification. 
013C 66 ; These will be mapped. 
013C 67 ; 
013C 68 
013¢ 69 SMAPBIT RABSV_EOF ,DAPS$V_EOF ; Map EOF bit 
gta 
0144 373 ; The following DAP bits are defined in the DAP V5.2 specification. 
0144 73; These will be mapped iff partner has implemented to DAP since V5.2 and for 
0144 374 ; UIF and TPT additional checks will be made. 
0144 375; 
0144 376 
3A 67 22 «€1 0144 377 #DAPS$V_GEQ vous 7. 10$ ; Branch if partner uses DAP before V5.2 
0148 378 SMAPBIT RABSV_FOL, _» : Map FDL bit 
0150 379 SMAPBIT RABSV~LOA,DAPSV-LOA ; Map LOA bit 
0158 380 SMAPBIT RABSV_KGE ,DAP$V_KGE ; Map KGE bit 
0160 381 SMAPBIT RABSV_KGT ,DAPSV_KGT : Map KGT bit 
16 67 30 €1 0168 382 BBC #DAPSU_RMS, R7); 108 ; Branch if partner is not RMS based 
016C 8 SMAPBIT RABSV_OIF ,DAPSV Map UIF bit 
06 A730 «83 0174 «384 BITW peel azDAP$y. AVAXONS-PARTNERD >" = 
0178 385 <18<DAP$V~VAXELAN=PARTNER>>! = 
0178 386 0> ,DAP$W_PARTNER(R7) ; Branch if partner is neither VAX/VMS 
08 13 0178 387 BEQL _—-10$ : nor VAXELAN 
O17A 388 SMAPBIT RABSV_TP” ,DAPSV_TPT ; Map TPT bit 
0182 389 ; sxe $MAPBIT RABSV_ RAH, DAPS$V_ RAH ; Map RAH bit 
O183 # ; *eeee SMAPBIT RABSV_WBH,DAPSV_WBH ; Map WBH bit 
018 Me : 
0182 38 ; The following DAP bits are defined in the DAP V5.4 specification. 
0182 $00 3: These will be mapeed iff partner has implemented to DAP since V5.4 and 
018 95 ; partner is VAX/V 
o18 337 $ 
26 67 «23.~«€E: 8 98 10$: BBC #DAPS$V_GEQ_ V54,(R7),20$ Branch if partner uses DAP before V5.4 
06 A730 «683 0186 «= 399 BITw #<< 1a<DAPS0_ VAXVMS-PARTNER> 
018A 400 <1a<DAP$V V VAAL CANCPARTNERDS I 
pieA 401 > ,DAPSW_PARTNER(R7) ; Branch if partner is neither VAX/VMS 
20 «13 oi A 40¢ o$ > nor VAXELAN 
18C 40 SRAPBIT RABSV_ULK ,DAP$V_ULK ; Map ULK bit 
Bide 404 SMAPBIT RABSV_NLK DAPSV a ; Map NLK bit 
19¢ 86.405 SMAPBIT RABSV_RLK ,DAPS$V ; Map RLK bit 
O1A4 406 SMAPBIT RABSV_BIO,DAPSV_ -ROPBIO ; Map BIO bit 
hae 
1AC 209 ; The following DAP bits are defined im the DAP V6.0 specification. 
O1AC 410 ; These will be mapped iff partner has implemented to DAP since V6.0 and 
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Q1AC §=—411 ; (except for LIM) partner is VAX/VMS. 
ge He 
2C 67 «625 ~=6©—E1 SCOO1AC S414 208: BBC #DAPSV_GEQ ved. (R7),30$ ; Branch if partner uses DAP before V6.0 
0180 415 SMAPBIT RABSV_CIM,BAP Vabi IM ; Map LIM bit 
20 67 34 #€1 O1BB 416 BBC #OAPST VAKVMS.¢ (R7),30$ ; Branch if partner is not VAX/VMS 
O1BC 417 $MAPBIT RABSV_AXR, DAPSV_ : Map NXR bit | 
01¢4 418 SMAPBIT RABSV_WAT,DAP$V_ROPWAT ; Map WAT bit 
Q1CC 419 SMAPBIT RABSV_RRL,DAPS$V_RRL 3; Map RRL bit 
01D4 420 SMAPBIT RABSV_ “REA, DAPSV— REA 3; Map REA bit 
se OQ Q1DC 421 308: MOVL R2,R1_ ; Move data to correct register 
FEIE' 30 O1DE 4 ( BSBW = NTSCVT_BN4_EXT : Store ROP as an extensible field 
05 ie 4 RSB 3; Exit 
O1E tse 
O1E3 425 - END ; End of module 
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$$.PSECT_EP = 99 DAP$Q_SYSPEC 38 
SSCOUNT : DAPSV-APPEND : D 
SSRMSTEST = 1A DAPS$V_EOF = 0 
SSRMS_PBUGCHK = 0000 8 $V~FD = 00000001 
SSRMS_ TBUGCHK = 0000 DAPS$V_GE -V32 = 3 00 ¢ 
SSRMS_UMODE = 00000004 AP$V_GEQ_V54 = 000000 
DAP$B-BITCNT 0000035 DAP$V~GEQ_V60 = 00000025 
DAPSB_BLKCNT 00000 P$V_KGE = 00000009 
DAP$B_CTLFUN 690004 DAPSV~KGT = 0000000A 
DAP$B_DCODE_F 1D 000001 DAPSV_LIM = 0000000E 
DAPSB-DCODE-ASG 00000014 DAPSV-ALR = 00000008 
DAPSB_DECV §0009049 DAPSV_NXR = $6000005 
DAPS$B_ECONUM 49 9 DAPSV_RANKEY = 00000008 
DAPS$B-FILESYS 0000004 DAPSV-RANRFA = 0000000A 
DAPSB_FLAGS 00000031 DAPS$V_RANRRN = 00000006 
DAP$B_KRF 00000047 DAP$V_RANVBN = 00000007 
DAPS$B_LEN256 eat DAPSV_REA = 00000012 
DAP$B_LENGTH 00000033 DAPS$V_RLK = 0000000C 
DAPSB_OSTYPE 00000042 P$V_RMS = 00000030 
“RAC 00000046 DAP$V_ROPBIO = 00000000 
DAPSB_STREAMID aie ey by DAPS$V_ROPWAT = 00000010 
AP$B_TYPE 0000003 =RR = 00000011 
~USRNUM 00000046 DAPS$V_SEQFIL = 00000005 
DAP$B_USRVER 00000048 DAP$V_SEQRAC = 00000021 
DAP$B_VERNUM 00000044 DAPSV_SWMODE = 0000000C 
DAP$B_X_ FIELD 00000024 DAPSV_TPT = 00000006 
D “eC 000000C0 DAPS$V_UIF = 00000002 
DAPSK_ACK_MSG = 00000006 DAP$V_ULK = 00000005 
DAPS$K_BLK_FILE = 00000005 DAPS$V_VAXELAN = 00000035 
DAP$K_BLK_VBN = 00000004 DAPS$V_VAXVMS = 00000034 
~BL 00C000C0 DAP$W_BUFSIZ 00000040 
DAPS$K_CONNECT = 00000002 DAPSW_CTLMENU 00000044 
DAPSK_CTL_MSG = 00000004 DAP$W_DISPLAY2 00000054 
DAPSK_KEY_ACC = 00000001 DAP$W_PARTNER 00000006 
DAPSK_RFA_ACC = 00000002 DAP$W_ VERSION 00000004 
DAPSK_SEQ_ACC = aia aie aes ERRSUP 0000007E 01 
DAPS$K_SEQ_FIL = aieaiee EXIT 0000007D R 01 
DAPSL_CMWA 00000030 GET_RAC 00000005 01 
DAP$L_CRC_RSLT 00000020 IFBSB_FAC = aaa $3 
APS$L_DCOBE _STS 00000018 IFBSL_NWA_PTR = 0000003C 
DAPSL_MSG_MASK 0000001C IFB$V_BIO = 00000005 
P$L_ROP 00000050 IF B$V_BRO = 00000006 
DAPSL_SSPWA ae 4 IFBSV_PPF_IMAGE = 44s 2 
DAPSL~TEMP 000 IFB$V~SQ0 = 00000020 
DAPSM_BITCNT = 00000008 IRBS$V_DAP_CONN = 0000003¢ 
DAPSM_BLKCNT = 4 4 NTSBUTLD_READ eeerenee 01 
DAPSM_KRF = 00000004 NTSBUILD- TAIL aeeeeree XX 01 
P$M_ROP = B28 0 NTSCHK_RAC QOOOO0AD RG 01 
P$M_SEGMENT = 4 4 NTSCHK SQ0 44d 2 RG 01 
DAPSM_TMP1$ = . 00 NTSCONRECT 00000000 RG 01 
DAPSM~TMP2S = FFF8000 NTSCVT_BN4_EXT eeeeeree X01 
DAP$Q_DCODE_FLG 000000 NTSMAP_ ROP 00000136 RG 01 
DAPSO"KEY 900004 NTSRECEIVE eessesse BO} 
DAP$Q_MSG_BUF 1 0 NTSRAT_RAC eeneeeee x 1 
DAP$Q_MSG_BUF 2 44 b4 NTSRMT_ROP eeereere 01 
DAP$Q7SYSCAP 000002 NTSTRANSMIT teeeeeee X01 
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NWASB_ALLXABCNT 000011 NWAST_XLTBUF 1 9 O2AC 
NWASB_DAP_RAC 45 NWAST_XLTBUF2 9 A 
NWASB_FILESYS C NWAST_XMTBUF C 
NWASB_KEYXABCNT § 11D NWASV_DEVTRM s 001 
NWASB_NETSTRSIZ 000016F NWASV_F TM_EOF = 001D 
NWASB_NODBUF $12 Bo8 168 NWASV-FTM_INIT = 000 8 19 
~ORG oce NWASV_LAST_MSG = 4 000 

NWASB_OSTYPE 00000C4 WASV_RAC_FL = 00 484 

ASB_R 00000C7 NWASW-BUICD 0000002 
NWASB_RMS_RAC eet NWASW_DAPBUF S1Z QOOO0CA 
NWASC_BL 00000800 NWASW_DIR_OFF BOO NRO CE 
NWASK_BLN BR OR RB 8 NWASW_DISPLAY 8 ata 
NWASK_1D = 0000 NWASW_FIL_OFF QOOO0CE 
NWASL_ALLXABADR 00000100 NWASW- JNLRABJOP 0000011E 
NWASL_DATXABADR 00000104 PARTNER = 00000030 
NWASL_DEV 000000C0 PIOSA_TRACE aeeeneee =X 01 
NWASL _FHCXABADR 00000108 RABS$B_K = 00000035 
NWASL_KEYXABADR 0000010C RAB$B_RAC = QOOOO0IE 
NWASL_MSG_MASK 00000004 RABSC_SEQ = 00000000 
NWASL_PRORABADR 00000110 RABS$L_ROP = 00000004 
NWASL_RDTXABADR 00000114 RAB$V_BIO = 00000008 

ASL_SAVE_FLGS 00000128 RABSV_EOF = 00000008 

_SUMXABADR 00000118 RABSV_FOL = 00000006 

NWASL_ THREAD OOOOOOF C RABSV_KGE = 00000015 
NWASL_XLTATTR 00000238 RABSV_KGT = 00000016 
NWASL _XLTBUFFLG 0000022C RABSV_LIM = 0000000E 
NWASL_XLTCNT 00000228 RABSV_LOA = 0900000D 
NWASL _XLTMAX INDX 00000234 RABS$V_NLK = 00000014 
NWASL_XLTSIZ 00060230 RABSV_NXR = 00000017 

A$Q_ACS 00000244 RABSV_REA = a ot 
NWASQ_81GBUF 00000170 RABSV_RLK = 0000001 
NWASQ_BLD 000000F 0 RABSV_RRL = 00000003 
NWASQ_FLG 00000000 RABSV_TPT = 00000001 
NWASQ_INODE 0000025C¢ RABSV_UIF = 00000004 
NWA$Q_10SB 00000008 RABS$V_ULK = 00000012 
NWASQ_LNODE 00000160 RABSV_WAT = BRD foo SE 
NWASQ_LOGNAME 0000023C RECV_ACK 0000059 R 01 
NWASQ_NCB 00000264 RMS$_FITM = 000187C4 
NWASQ_RCV aaa $ SEND-CTL QOOOO01F R 01 
NWASQ_SAVE DESC tt 0 TPTSC_NTCONN teeeeere = X 01 
NWASQ_XLTBOF 1 000024C 
NWAS$Q_XLTBUF 2 00000254 
Rondt Af oou saUabese 
NWA$T_AUXBUF $60008¢6 
NWAST_DAP 00000000 
NWA$T_ INODEBU astaietes 
NWAST_ITM_ATTR 00 0 
NWAST_ITM_END 00000224 
NWAST_ITM_LST One ° 
NWAST_ 1 TM_MAXINDX 000021 
NWAST-ITM-STRING 000020C 
NWAST_NCBBUF 3° 052¢ 
NWAST_NODEBUF 0000169 
NWA$T_RCVBUF 98 1A 
NWAST” SCAN 19 
NWAST~ TEMP 00001 
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: Psect synopsis ! 
tome ee aoa saan & 
PSECT name Allocation PSECT No. Attributes 
- ABS. 00000000 9.) 9 ( 0.) NOPIC USR CON ABS 
NF SNE TWORK QOOOOIE ( 483.) 1 © Ret PIC USR CON” REL 
$ 00000800 ( 2048.) 02 ( 2.) NOPIC USSR CON’ ABS 


ow eee er es 


ee + 
: Performance indicators : 


Phase Page faults CPU Time Elapsed Time 
Initialization 32 00:00:00.05 98:80:00.8) 
Command processing 114 00:00:00.59 B86: % -08 
Pass 321 es SE 00:00:31.24 
Symbol table sort 0 00:00:01.6 BO OR 6 £8 
Pass 2 90 00:00:02.14 00:00:07.92 
Symbol table output 25 00:00:00.27 00:00:01.04 
Psect synopsis output 1 00:00:00.02 00:00:00.07 
Cross-reference output 0 00:00:00.00 00:00:00.00 
Assembler run totals 585 00:00:16.69 00:00:46.88 


The working set Limit was 1350 pages. : 

62993 bytes (124 pages) of virtual memory were used to buffer the intermediate cod 
There were 60 pages of symbol table space allocated to hold 1108 no 
425 source lines were read in Pass 1, producing 14 object records in Pass 2 
28 pages of virtual memory were used to define 27 macros. 


SMO NO OEE OOM me me ef 


Macro Library name 


-$255$DUA28: CRMS.OBJJRMS.MLB; 1 19 
$255$DUA28: (SYSLIBISTARLET.MLB;2 4 
TOTALS (all Libraries) 23 
1343 GETS were required to define 23 macros. 

There were no errors, warnings or information messages. 


MACRO/LIS=LIS$:NTOCONN/OBJ=OBJ$:NTOCONN MSRC$:NTOCONN/UPDATE=(ENH$:NTOCONN) +L 1B$:RMS/LIB 


4 16:20 


LCL NOSHR NO 
GBL NOSHR 
LCL NOSHR 


e. 
non-local and 52 Local symbols. 


EXE 
EXE 
EXE 
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NORD NO 
RD N 
RD 


WRT NOVEC BYTE 


OWRT NOVEC BYTE 


WRT NOVEC BYTE 
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